10 RESTORE:READA:BO=PEEK(66)*256+PEEK(65)+3:DV=PEEK(186):IFDV<8THENDV=8
20 CE=BO+3:BL=BO+6:CO=BO+9:SW=BO+12:C2=BO+15:DY=BO+18:SYSBO:POKE53272,23
50 SYSCE,15,"[212] [200] [210] [197] [197] - [196]   [193] [210] [212]   [204] [193] [194]":SYSCE,17,"[194]Y [203]EN [210]OBINSON"
70 SYSCE,19,"([195]) 1997 BY [202]&[198] [208]UBLISHING
80 [158]CE,20,"(null)HIS (null)ROGRAM RIGHT$SN'T (null)UBLIC STR$OMAIN
5000 SYSDY,"3D ART LAB",DV
6000 DATA0